unit uSAF0001_01;

interface

uses
   Windows,
   Forms,
   Dialogs,
   Messages,
   SysUtils,
   Classes,
   DB,
   ADODB,
   Midas,
   WideStrings,
   FMTBcd,
   Variants;

type
   TDMDados = class(TDataModule)
      dsLista: TDataSource;
      dsTabela: TDataSource;
      conADOServer: TADOConnection;
      tblTabela: TADOTable;
      qryAuxiliar: TADOQuery;
      qryLista: TADOQuery;
    cmdAuxiliar: TADOCommand;

   private

      { Private declarations }

   public

   const
      _sistema = 'SAF';
      _sistemaMenu = 'SAF0000';
      _sistemaNome = 'SAF0001';
      _sistemaDescricao = 'BACKUP E RESTORE';

      { Public declarations }

   end;

var
   DMDados: TDMDados;

implementation

{$R *.dfm}

uses
   uLibGlobal;

end.

